home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 21 / CU Amiga Magazine's Super CD-ROM 21 (1998)(EMAP Images)(GB)[!][issue 1998-04].iso / CUCD / Programming / Python-1.4 / Source / Amiga / Python_netlib / sana2printfault.c < prev    next >
C/C++ Source or Header  |  1994-09-29  |  2KB  |  79 lines
  1. RCS_ID_C="$Id: sana2printfault.c,v 4.1 1994/09/29 23:09:02 jraja Exp $";
  2. /*
  3.  *      sana2printfault.c - print SANA-II error message
  4.  *
  5.  *      Copyright © 1994 AmiTCP/IP Group, 
  6.  *                       Network Solutions Development Inc.
  7.  *                       All rights reserved.
  8.  */
  9.  
  10. #include <devices/sana2.h>
  11. #include <net/sana2errno.h>
  12. #ifdef __SASC 
  13. #include <proto/dos.h>
  14. #else
  15. #include <clib/dos_protos.h>
  16. #endif
  17.  
  18. /****** sana2.lib/sana2PrintFault *********************************************
  19.  
  20.     NAME
  21.     Sana2PrintFault - print SANA-II device error messages
  22.  
  23.     SYNOPSIS
  24.     #include <devices/sana2.h>
  25.  
  26.     Sana2PrintFault(banner, ios2request)
  27.  
  28.     void Sana2PrintFault(const char *, struct IOSana2Req *)
  29.  
  30.     FUNCTION
  31.     The Sana2PrintFault() function finds the error message corresponding
  32.     to the error in the given SANA-II IO request and writes it, followed
  33.     by a newline, to the Output().  If the argument string is non-NULL it
  34.     is preappended to the message string and separated from it by a colon
  35.     and space (`: ').  If string is NULL only the error message string is
  36.     printed.
  37.  
  38.     SEE ALSO
  39.     Sana2PrintFault()
  40.  
  41. *******************************************************************************
  42. */
  43.  
  44.  
  45. void 
  46. Sana2PrintFault(const char *banner, struct IOSana2Req *ios2)
  47. {
  48.   register WORD err = ios2->ios2_Req.io_Error;
  49.   register ULONG werr = ios2->ios2_WireError;
  50.   LONG args[3];
  51.   char * format;
  52.  
  53.   args[0] = (LONG)banner; 
  54.  
  55.   if (err >= sana2io_nerr || -err > io_nerr) {
  56.     args[1] = (LONG)io_errlist[0];
  57.   } else { 
  58.     if (err < 0) 
  59.       args[1] = (LONG)io_errlist[-err];
  60.     else 
  61.       args[1] = (LONG)sana2io_errlist[err];
  62.   }
  63.   if (werr == 0 || werr >= sana2wire_nerr) {
  64.     if (banner != NULL)
  65.       format = "%s: %s\n";
  66.     else
  67.       format = "%s\n";
  68.   } else {
  69.     if (banner != NULL)
  70.       format = "%s: %s (%s)\n";
  71.     else
  72.       format = "%s (%s)\n";
  73.     args[2] = (LONG)sana2wire_errlist[werr];
  74.   }
  75.  
  76.   VPrintf(format, banner != NULL ? args : args + 1);
  77. }
  78.  
  79.